home *** CD-ROM | disk | FTP | other *** search
- %!PS-Adobe-3.0 Resource-FixCIDInitProcSet
- %%BeginResource: FixCIDInitProcSet (FDepVector)
- %%Title: (FixCIDInitProcSet/FDepVector)
- %%Version: 9.001
- %%Copyright: ------------------------------------------------------------
- %%Copyright: Copyright 1990-1998 Adobe Systems Incorporated.
- %%Copyright: All rights reserved.
- %%Copyright:
- %%Copyright: Patents Pending
- %%Copyright:
- %%Copyright: NOTICE: All information contained herein is the property
- %%Copyright: of Adobe Systems Incorporated. Many of the intellectual
- %%Copyright: and technical concepts contained herein are proprietary
- %%Copyright: to Adobe, are protected as trade secrets, and are made
- %%Copyright: available only to Adobe licensees for their internal use.
- %%Copyright: Any reproduction or dissemination of this software is
- %%Copyright: strictly forbidden unless prior written permission is
- %%Copyright: obtained from Adobe.
- %%Copyright:
- %%Copyright: PostScript and Display PostScript are trademarks of
- %%Copyright: Adobe Systems Incorporated which may be registered in
- %%Copyright: certain jurisdictions.
- %%Copyright: ------------------------------------------------------------
- %%EndComments
- /FDepVector-C 16 dict begin/Map 10 dict dup begin/78ms-RKSJ-H
- /Fix-C-78ms-RKSJ-H def/78ms-RKSJ-V/Fix-C-78ms-RKSJ-V def/83pv-RKSJ-H
- /Fix-C-83pv-RKSJ-H def/90ms-RKSJ-H/Fix-C-90ms-RKSJ-H def/90ms-RKSJ-V
- /Fix-C-90ms-RKSJ-V def/90pv-RKSJ-H/Fix-C-90pv-RKSJ-H def/Ext-RKSJ-H
- /Fix-C-Ext-RKSJ-H def/Ext-RKSJ-V/Fix-C-Ext-RKSJ-V def/RKSJ-H/Fix-C-RKSJ-H def
- /RKSJ-V/Fix-C-RKSJ-V def end def/78ms-RKSJ-H{pop exch pop/Fix-C-78ms-RKSJ-H
- lib_extensions/lib_FixCMapCategoryType get findresource exch cid_ComposeFont}
- bind def/78ms-RKSJ-V{pop exch pop/Fix-C-78ms-RKSJ-V lib_extensions
- /lib_FixCMapCategoryType get findresource exch cid_ComposeFont}bind def
- /83pv-RKSJ-H{1 dict begin/copyfont{dup length dict begin{1 index/FID eq{pop
- pop}{def}ifelse}forall currentdict end}bind def pop exch pop/Fix-C-83pv-RKSJ-H
- lib_extensions/lib_FixCMapCategoryType get findresource exch cid_ComposeFont
- copyfont dup/FDepVector 2 copy get dup length array copy dup 4 2 copy get
- copyfont dup/Encoding 2 copy get aload pop 16 -1 roll 16 array astore put dup
- /FDepVector 2 copy get aload pop 16 1 roll 16 array astore put dup/FontName
- get exch definefont put dup 2 2 copy get copyfont dup/Encoding[1 1 4 index
- /Encoding get length{}for]put dup/FDepVector[/NotDefFont findfont 3 index
- /FDepVector get aload pop]put dup/FontName get exch definefont put put dup
- /FontName get exch definefont end}bind def/90pv-RKSJ-H{pop exch pop
- /Fix-C-90pv-RKSJ-H lib_extensions/lib_FixCMapCategoryType get findresource
- exch cid_ComposeFont}bind def/90ms-RKSJ-H{pop exch pop/Fix-C-90ms-RKSJ-H
- lib_extensions/lib_FixCMapCategoryType get findresource exch cid_ComposeFont}
- bind def/90ms-RKSJ-V{pop exch pop/Fix-C-90ms-RKSJ-V lib_extensions
- /lib_FixCMapCategoryType get findresource exch cid_ComposeFont}bind def
- /Ext-RKSJ-H{pop exch pop/Fix-C-Ext-RKSJ-H lib_extensions
- /lib_FixCMapCategoryType get findresource exch cid_ComposeFont}bind def
- /Ext-RKSJ-V{pop exch pop/Fix-C-Ext-RKSJ-V lib_extensions
- /lib_FixCMapCategoryType get findresource exch cid_ComposeFont}bind def/RKSJ-H
- {pop exch pop/Fix-C-RKSJ-H lib_extensions/lib_FixCMapCategoryType get
- findresource exch cid_ComposeFont}bind def/RKSJ-V{pop exch pop/Fix-C-RKSJ-V
- lib_extensions/lib_FixCMapCategoryType get findresource exch cid_ComposeFont}
- bind def/Hankaku{pop cid_ComposeFont dup/FontName get dup length string cvs
- dup(.Hankaku)search{pop pop pop exch/FDepVector get 0 get dup length dict
- begin{1 index/FID ne{def}{pop pop}ifelse}forall/FontName exch cvn def FontName
- currentdict end definefont}{pop pop}ifelse}bind def/Hiragana{pop
- cid_ComposeFont dup/FontName get dup length string cvs dup(.Hiragana)search{
- pop pop pop exch/FDepVector get 0 get dup length dict begin{1 index/FID ne{def
- }{pop pop}ifelse}forall/FontName exch cvn def FontName currentdict end
- definefont}{pop pop}ifelse}bind def/Katakana{pop cid_ComposeFont dup/FontName
- get dup length string cvs dup(.Katakana)search{pop pop pop exch/FDepVector get
- 0 get dup length dict begin{1 index/FID ne{def}{pop pop}ifelse}forall/FontName
- exch cvn def FontName currentdict end definefont}{pop pop}ifelse}bind def
- /Roman{pop cid_ComposeFont dup/FontName get dup length string cvs dup(.Roman)
- search{pop pop pop exch/FDepVector get 0 get dup length dict begin{1 index/FID
- ne{def}{pop pop}ifelse}forall/FontName exch cvn def FontName currentdict end
- definefont}{pop pop}ifelse}bind def/WP-Symbol{pop cid_ComposeFont dup/FontName
- get dup length string cvs dup(.WP-Symbol)search{pop pop pop exch/FDepVector
- get 0 get dup length dict begin{1 index/FID ne{def}{pop pop}ifelse}forall
- /FontName exch cvn def FontName currentdict end definefont}{pop pop}ifelse}
- bind def currentdict end/FixCIDInitProcSet defineresource pop
- %%EndResource
- %%EOF
-